function toaster_plot (t, H, T, T_a, T_s)

  figure;
  if 0
    subplot (2, 1, 1)
    plot (t, T);
    grid on;
    set (gca, 'FontSize', 18);
    axis ([t(1) t(end) T_a 50]);
    xlabel ('Time (s)');
    ylabel ('Temperature (^0C)');
  else
    subplot (2, 1, 1)
    plot (t, T_s - T);
    grid on;
    set (gca, 'FontSize', 18);
    axis ([t(1) t(end) -10 10]);
    xlabel ('Time (s)');
    ylabel ('Temperature error (^0C)');
  end
  
  subplot (2, 1, 2)
  plot (t, H);
  grid on;
  set (gca, 'FontSize', 18);
  axis ([t(1) t(end) 0 15]);  
  xlabel ('Time (s)');
  ylabel ('Heater power (W)');


  
